 
 
 
 
 
 
 
 /* Engaging the Public Through Design: How Digital Platforms Nudge Public Engagement  */
/* STATA 18 */




 clear
graph drop _all
set matsize 5000
set more off








   /*******************************************************************************
 *******Table A2	
 ********************************************************************************/
 
  
 use "maindata.dta",clear
 
 
 ***our sample percentage
 
 table female
 
 tab age_type
 
 tab edu
 
 
 
 
 
 
   
   /*******************************************************************************
 *******Table A2	
 ********************************************************************************/
 
  
 use "maindata.dta",clear
 

 reg choose score visualcity award ib(1).infor ib(1).parti ib(1).enter,r cluster(newid)
  eststo
 reg choose score visualcity award ib(1).infor ib(1).parti ib(1).enter female age i.edu big_city work_gov ccp marriage incomelevel,r cluster(newid)
  eststo
  reg part_willing score visualcity award ib(1).infor ib(1).parti ib(1).enter,r cluster(newid)
  eststo
 reg part_willing score visualcity award ib(1).infor ib(1).parti ib(1).enter female age i.edu big_city work_gov ccp marriage incomelevel,r cluster(newid)
  eststo

   reg Conve_score score visualcity award ib(1).infor ib(1).parti ib(1).enter,r cluster(newid)
  eststo
 reg Conve_score score visualcity award ib(1).infor ib(1).parti ib(1).enter female age i.edu big_city work_gov ccp marriage incomelevel,r cluster(newid)
  eststo

    reg achieve_score score visualcity award ib(1).infor ib(1).parti ib(1).enter,r cluster(newid)
  eststo
 reg achieve_score score visualcity award ib(1).infor ib(1).parti ib(1).enter female age i.edu big_city work_gov ccp marriage incomelevel,r cluster(newid)
  eststo

 
 esttab, drop(age *.edu female big_city work_gov ccp marriage incomelevel _cons) se(3) b(3) star(* .1 ** .05 *** .01) tex r2
eststo clear
 
 
 
 
  
     /*******************************************************************************
 *******Table A3
 ********************************************************************************/
  
  
   
  
 use "maindata.dta",clear
   
   reg part_willing choose,r cluster(newid)
  eststo

  reg part_willing choose female age i.edu big_city work_gov ccp marriage incomelevel,r cluster(newid)
  eststo

 reg part_willing choose score visualcity award ib(1).infor ib(1).parti ib(1).enter female age i.edu big_city work_gov ccp marriage incomelevel,r cluster(newid)
  eststo
   esttab, drop(age *.edu female big_city work_gov ccp marriage incomelevel _cons) se(3) b(3) star(* .1 ** .05 *** .01) tex r2
eststo clear
  
 
 
 
 
 
    /*******************************************************************************
 *******Table A4
 ********************************************************************************/
 
  
 use "maindata.dta",clear
 

 reg choose score visualcity award ib(1).infor ib(1).parti ib(1).enter if task==1,r cluster(newid)
  eststo
  reg choose score visualcity award ib(1).infor ib(1).parti ib(1).enter if task==2,r cluster(newid)
  eststo
   reg choose score visualcity award ib(1).infor ib(1).parti ib(1).enter if profile==1,r cluster(newid)
  eststo
    reg choose score visualcity award ib(1).infor ib(1).parti ib(1).enter if profile==2,r cluster(newid)
  eststo
     reg choose score visualcity award ib(1).infor ib(1).parti ib(1).enter i.task i.profile ,r cluster(newid)
  eststo
  esttab, drop(_cons *.task *.profile) se(3) b(3) star(* .1 ** .05 *** .01) tex r2
eststo clear
 
 
  
 
 
 
    /*******************************************************************************
 *******Table A5
 ********************************************************************************/
 	 use "maindata.dta",clear
 		
		
		
/*
    foreach x of varlist  score visualcity  infor parti enter_wechat enter_QR {
		
		gen award_`x'=award*`x'
			}
*/



			
 reg choose score visualcity award infor parti ib(1).enter award_score award_visualcity award_infor award_parti award_enter_wechat award_enter_QR,r cluster(newid)
  esttab, drop(_cons ) se(3) b(3) star(* .1 ** .05 *** .01) tex r2
eststo clear

 
 
 
 
     /*******************************************************************************
 *******Table A6 
 ********************************************************************************/
 
   	 use "maindata.dta",clear
	 
/*
 foreach x of varlist  score visualcity award infor parti enter_wechat enter_QR {
		
		gen know_`x'=knowledge*`x'
			}
 
 */

 

 reg choose score visualcity award infor parti ib(1).enter knowledge  know_score- know_enter_QR ,r cluster(newid)
  esttab, drop(_cons ) se(3) b(3) star(* .1 ** .05 *** .01) tex r2
eststo clear
 
 
 
 
 	 
	 
     /*******************************************************************************
 *******Table A7 
 ********************************************************************************/
  	 use "maindata.dta",clear
	 
	 
	 
 /*
  foreach x of varlist  score visualcity award infor parti enter_wechat enter_QR {
		
		gen edu_`x'=college_edu*`x'
			}
 */
  
 reg choose score visualcity award infor parti ib(1).enter college_edu edu_score- edu_enter_QR,r cluster(newid)
  esttab, drop(_cons ) se(3) b(3) star(* .1 ** .05 *** .01) tex r2
eststo clear
 
 
 
 
     /*******************************************************************************
 *******Table A8
 ********************************************************************************/
   	 use "maindata.dta",clear
	 
	 
	 
  /*
	foreach x of varlist  score visualcity award infor parti enter_wechat enter_QR {
		
		gen ant_`x'=parti_ant*`x'
			}
			
*/
		
			
 reg choose score visualcity award infor parti ib(1).enter parti_ant ant_score ant_visualcity ant_award ant_infor ant_parti ant_enter_wechat ant_enter_QR ,r cluster(newid)
  esttab, drop(_cons ) se(3) b(3) star(* .1 ** .05 *** .01) tex r2
eststo clear
 
 
 
 
 
  
  /*******************************************************************************
 *******Table A10
 ********************************************************************************/
     	 use "maindata.dta",clear
	 
	 
	 
  /*
  	foreach x of varlist  score visualcity award infor parti enter_wechat enter_QR {
		
		gen ideo_`x'=ideo*`x'
			}
*/		
			
			
  		
 reg choose score visualcity award infor parti ib(1).enter ideo ideo_score- ideo_enter_QR   ,r cluster(newid)
  esttab, drop(_cons ) se(3) b(3) star(* .1 ** .05 *** .01) tex r2
eststo clear
 
 
 

 
 /*******************************************************************************
 *******Table A11
 ********************************************************************************/
    
	 	 use "maindata.dta",clear
		 
		 
  /*   	foreach x of varlist  score visualcity award infor parti enter_wechat enter_QR {
		
		gen support_`x'=support_doublecanbon*`x'
			}
	*/		
			
			
  		
 reg choose score visualcity award infor parti ib(1).enter support_doublecanbon support_score- support_enter_QR   ,r cluster(newid)
  esttab, drop(_cons ) se(3) b(3) star(* .1 ** .05 *** .01) tex r2
eststo clear
 
   
    
 
 
 

 
 /*******************************************************************************
 *******Table A12
 ********************************************************************************/
 
  	 use "maindata.dta",clear
		 
		 
 /*
 
     	foreach x of varlist  score visualcity award infor parti enter_wechat enter_QR {
		
		gen indus_`x'=industry_affect*`x'
			}
*/			
			
			
		
 reg choose score visualcity award infor parti ib(1).enter industry_affect indus_score- indus_enter_QR   ,r cluster(newid)
  esttab, drop(_cons ) se(3) b(3) star(* .1 ** .05 *** .01) tex r2
eststo clear
 
    
 
 
    /*******************************************************************************
 *******Table A13
 ********************************************************************************/
 
   	 use "maindata.dta",clear
		 
	
   /*
 
     	foreach x of varlist  score visualcity award infor parti enter_wechat enter_QR {
		
		gen PI_`x'=PI_mean*`x'
			}
		
	*/
			
		
 reg choose score visualcity award infor parti ib(1).enter PI_mean PI_score- PI_enter_QR    logpgdp logprevenue logpop,r cluster(newid)
  esttab, drop(_cons ) se(3) b(3) star(* .1 ** .05 *** .01) tex r2
eststo clear






    /*******************************************************************************
 *******Table A14
 ********************************************************************************/
     	 use "maindata.dta",clear
		
  
 /*
     	foreach x of varlist  score visualcity award infor parti enter_wechat enter_QR {
		
		gen social_`x'=psocial_org*`x'
			}
		
*/		
			
		
 reg choose score visualcity award infor parti ib(1).enter psocial_org social_score- social_enter_QR    logpgdp logprevenue logpop,r cluster(newid)
  esttab, drop(_cons ) se(3) b(3) star(* .1 ** .05 *** .01) tex r2
eststo clear
 



















 
 
 
 
 
 
 
 
 
 
 
 